home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / t3_1 / risc_src.lha / risc_sources / xlib / xwmhints.t < prev    next >
Text File  |  1990-06-01  |  1KB  |  21 lines
  1. (herald xwmhints (env tsys (xlib interface)))
  2. (DEFINE (MAKE-XWMHINTS) (CONS 'XWMHINTSP (MAKE-BYTEV 36)))
  3. (DEFINE (XWMHINTS-FLAGS X) (MREF-INTEGER (CHK-XWMHINTSP X) 0))
  4. (DEFINE (XWMHINTS-FLAGS! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 0 Y))
  5. (DEFINE (XWMHINTS-INPUT X) (MREF-INTEGER (CHK-XWMHINTSP X) 4))
  6. (DEFINE (XWMHINTS-INPUT! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 4 Y))
  7. (DEFINE (XWMHINTS-INITIAL_STATE X) (MREF-INTEGER (CHK-XWMHINTSP X) 8))
  8. (DEFINE (XWMHINTS-INITIAL_STATE! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 8 Y))
  9. (DEFINE (XWMHINTS-ICON_PIXMAP X) (MREF-INTEGER (CHK-XWMHINTSP X) 12))
  10. (DEFINE (XWMHINTS-ICON_PIXMAP! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 12 Y))
  11. (DEFINE (XWMHINTS-ICON_WINDOW X) (MREF-INTEGER (CHK-XWMHINTSP X) 16))
  12. (DEFINE (XWMHINTS-ICON_WINDOW! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 16 Y))
  13. (DEFINE (XWMHINTS-ICON_X X) (MREF-INTEGER (CHK-XWMHINTSP X) 20))
  14. (DEFINE (XWMHINTS-ICON_X! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 20 Y))
  15. (DEFINE (XWMHINTS-ICON_Y X) (MREF-INTEGER (CHK-XWMHINTSP X) 24))
  16. (DEFINE (XWMHINTS-ICON_Y! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 24 Y))
  17. (DEFINE (XWMHINTS-ICON_MASK X) (MREF-INTEGER (CHK-XWMHINTSP X) 28))
  18. (DEFINE (XWMHINTS-ICON_MASK! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 28 Y))
  19. (DEFINE (XWMHINTS-WINDOW_GROUP X) (MREF-INTEGER (CHK-XWMHINTSP X) 32))
  20. (DEFINE (XWMHINTS-WINDOW_GROUP! X Y) (SET-MREF-INTEGER! (CHK-XWMHINTSP X) 32 Y))
  21.